home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh3x / sh35.d64 / flpt_mflpt test (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  868b  |  30 lines
  1. 5 REM*** TEST FUER FLPT UND MFLPT ***
  2. 10 POKE52,96:POKE56,96:CLR:PRINTCHR$(147)CHR$(17)CHR$(17)
  3. 15 PRINT"IST DER SMON EINGELADEN?":INPUT"J/N";A$:IFA$="N"THENEND
  4. 20 PRINTCHR$(17)CHR$(17)"   FLPT IN FAC"TAB(25)"1":PRINT
  5. 30 PRINT"   FLPT IN ARG"TAB(25)"2":PRINT
  6. 40 PRINT"   MFLPT AB $6800"TAB(25)"3":PRINT:PRINT
  7. 50 GETA$:IFA$<"1"ORA$>"3"THEN50
  8. 60 PRINT"AUSWAHL",A$:PRINT:PRINT:INPUT"GEBEN SIE EINE ZAHL EIN";Z
  9. 65 PRINTCHR$(147)
  10. 70 ONVAL(A$)GOTO100,200,300
  11. 100 REM***** FAC *****
  12. 110 POKE785,0:POKE786,192:REM USR-VEKTOR AUF SMON = $C000
  13. 120 A=USR(Z)
  14. 200 REM***** ARG *****
  15. 210 POKE785,0:POKE786,96:REM USR-VEKTOR AUF $6000
  16. 220 A=USR(Z)
  17. 300 REM***** MFLPT *****
  18. 310 POKE785,0:POKE786,97:REM USR-VEKTOR AUF $6100
  19. 320 A=USR(Z)
  20. 400 REM*********************************
  21. 410 REM NACH MELDUNG DES SMON MIT DEN
  22. 420 REM KOMMANDOS
  23. 430 REM (1)   M 0061
  24. 440 REM (2)   M 0069
  25. 450 REM (3)   M 6800
  26. 460 REM DEN MONITOR EINSCHALTEN. DIE
  27. 470 REM EINGEGEBENE ZAHL IST DANN ALS
  28. 480 REM HEX-BYTES SICHTBAR.
  29. 490 REM*********************************
  30.